From: Juri Linkov <juri@jurta.org>
Date: Sun, 11 Oct 2009 23:50:38 +0000 (+0000)
Subject: (read-file-local-variable-value):
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~9946
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=11a33ab2f2f6e638b5958531587be450b3fdb2bc;p=emacs.git

(read-file-local-variable-value):
Provide default value only for bound variables.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bd1333af152..8c3e61ea673 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-10-11  Juri Linkov  <juri@jurta.org>
+
+	* files-x.el (read-file-local-variable-value):
+	Provide default value only for bound variables.
+
 2009-10-11  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/tramp.el (tramp-local-host-p): Function shall return nil for
diff --git a/lisp/files-x.el b/lisp/files-x.el
index 3ad3f90e407..8261df18b51 100644
--- a/lisp/files-x.el
+++ b/lisp/files-x.el
@@ -92,7 +92,8 @@ Intended to be used in the `interactive' spec of
 			 nil 'set-variable-value-history
 			 (format "%S"
 				 (cond ((eq variable 'unibyte) t)
-				       (t (symbol-value variable))))))))))
+				       ((boundp variable)
+					(symbol-value variable))))))))))
 
 (defun read-file-local-variable-mode ()
   "Read per-directory file-local variable's mode using completion.